1
'------------------------------------------------------------------------------
3 ' This code was generated by a tool.
4 ' Runtime Version:2.0.50727.4927
6 ' Changes to this file may cause incorrect behavior and will be lost if
7 ' the code is regenerated.
9 '------------------------------------------------------------------------------
17 <Microsoft
.VisualStudio
.Tools
.Applications
.Runtime
.StartupObjectAttribute(0), _
18 Global.System
.Security
.Permissions
.PermissionSetAttribute(Global.System
.Security
.Permissions
.SecurityAction
.Demand
, Name
:="FullTrust")> _
19 Partial
Public NotInheritable Class ThisAddIn
20 Inherits Microsoft
.Office
.Tools
.Outlook
.OutlookAddIn
21 Implements Microsoft
.VisualStudio
.Tools
.Office
.IOfficeEntryPoint
23 Friend WithEvents CustomTaskPanes
As Microsoft
.Office
.Tools
.CustomTaskPaneCollection
25 <Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0")> _
26 Friend WithEvents Application
As Microsoft
.Office
.Interop
.Outlook
.Application
29 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
30 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
32 MyBase
.New("AddIn", "ThisAddIn")
36 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
37 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
38 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
39 Protected Overrides
Sub Initialize()
41 Me.Application
= Me.GetHostItem(Of Microsoft
.Office
.Interop
.Outlook
.Application
)(GetType(Microsoft
.Office
.Interop
.Outlook
.Application
), "Application")
42 Globals
.ThisAddIn
= Me
43 Global.System
.Windows
.Forms
.Application
.EnableVisualStyles
44 Me.InitializeCachedData
46 Me.InitializeComponents
51 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
52 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
53 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
54 Protected Overrides
Sub FinishInitialization()
59 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
60 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
61 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
62 Protected Overrides
Sub InitializeDataBindings()
63 Me.BeginInitialization
69 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
70 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
71 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
72 Private Sub InitializeCachedData()
73 If (Me.DataHost Is
Nothing) Then
76 If Me.DataHost
.IsCacheInitialized
Then
77 Me.DataHost
.FillCachedData(Me)
82 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
83 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
84 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
85 Private Sub InitializeData()
89 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
90 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
91 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
92 Private Sub BindToData()
96 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
97 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
98 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Advanced
)> _
99 Private Sub StartCaching(ByVal MemberName
As String)
100 Me.DataHost
.StartCaching(Me, MemberName
)
104 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
105 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
106 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Advanced
)> _
107 Private Sub StopCaching(ByVal MemberName
As String)
108 Me.DataHost
.StopCaching(Me, MemberName
)
112 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
113 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
114 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Advanced
)> _
115 Private Function IsCached(ByVal MemberName
As String) As Boolean
116 Return Me.DataHost
.IsCached(Me, MemberName
)
120 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
121 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
122 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
123 Private Sub BeginInitialization()
125 Me.CustomTaskPanes
.BeginInit
129 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
130 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
131 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
132 Private Sub EndInitialization()
133 Me.CustomTaskPanes
.EndInit
138 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
139 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
140 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
141 Private Sub InitializeControls()
142 Me.CustomTaskPanes
= New Microsoft
.Office
.Tools
.CustomTaskPaneCollection(Me.ItemProvider
, Me.HostContext
, "CustomTaskPanes", Me, "CustomTaskPanes")
146 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
147 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
148 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
149 Private Sub InitializeComponents()
153 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
154 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
155 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Advanced
)> _
156 Private Function NeedsFill(ByVal MemberName
As String) As Boolean
157 Return Me.DataHost
.NeedsFill(Me, MemberName
)
161 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
162 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
163 Global.System
.ComponentModel
.EditorBrowsableAttribute(Global.System
.ComponentModel
.EditorBrowsableState
.Never
)> _
164 Protected Overrides
Sub OnShutdown()
165 Me.CustomTaskPanes
.Dispose
171 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
172 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0")> _
173 Partial
Friend NotInheritable Class Globals
180 Private Shared _ThisAddIn
As ThisAddIn
182 Private Shared _ThisRibbonCollection
As ThisRibbonCollection
184 Private Shared _ThisFormRegionCollection
As ThisFormRegionCollection
186 Friend Shared
Property ThisAddIn() As ThisAddIn
191 If (_ThisAddIn Is
Nothing) Then
194 Throw
New System
.NotSupportedException
199 Friend Shared ReadOnly
Property Ribbons() As ThisRibbonCollection
201 If (_ThisRibbonCollection Is
Nothing) Then
202 _ThisRibbonCollection
= New ThisRibbonCollection
204 Return _ThisRibbonCollection
208 Friend Shared ReadOnly
Property FormRegions() As ThisFormRegionCollection
210 If (_ThisFormRegionCollection Is
Nothing) Then
211 _ThisFormRegionCollection
= New ThisFormRegionCollection(Globals
.ThisAddIn
.GetFormRegions
)
213 Return _ThisFormRegionCollection
219 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute(), _
220 Global.System
.CodeDom
.Compiler
.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0")> _
221 Partial
Friend NotInheritable Class ThisRibbonCollection
222 Inherits Microsoft
.Office
.Tools
.Ribbon
.RibbonReadOnlyCollection
224 Default
Friend Overloads ReadOnly
Property Item(ByVal inspector
As Microsoft
.Office
.Interop
.Outlook
.Inspector
) As ThisRibbonCollection
226 Return Me.GetRibbonContextCollection(Of ThisRibbonCollection
)(inspector
)
232 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute()> _
233 Partial
Friend NotInheritable Class ThisFormRegionCollection
234 Inherits Microsoft
.Office
.Tools
.Outlook
.FormRegionReadOnlyCollection
237 Public Sub New(ByVal list
As System
.Collections
.Generic
.IList(Of Microsoft
.Office
.Tools
.Outlook
.IFormRegion
))
241 Friend Overloads Default ReadOnly
Property Item(ByVal explorer
As Microsoft
.Office
.Interop
.Outlook
.Explorer
) As WindowFormRegionCollection
243 Return Globals
.ThisAddIn
.GetFormRegions(Of WindowFormRegionCollection
)(explorer
)
247 Friend Overloads Default ReadOnly
Property Item(ByVal inspector
As Microsoft
.Office
.Interop
.Outlook
.Inspector
) As WindowFormRegionCollection
249 Return Globals
.ThisAddIn
.GetFormRegions(Of WindowFormRegionCollection
)(inspector
)
255 <Global.System
.Diagnostics
.DebuggerNonUserCodeAttribute()> _
256 Partial
Friend NotInheritable Class WindowFormRegionCollection
257 Inherits Microsoft
.Office
.Tools
.Outlook
.FormRegionReadOnlyCollection